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= Test and set bit interlocked 


DECLARATIONS 
LIBSBBSSI = Test and set a bit with interlock 


15-SEP-1984 23:48:44 VAX/VMS Macro V04-00 


° 
6-SEP=1 was 


M12 
\ Ipseesst - Test and set bit interlocked 139 36O- 138% 7768: 
1 4 11:03: 
TITLE Lessess! - Test and set b 
IDENT /1-001/ 


Macro V04-00 

- SRCJLIBBBSS!1.MAR; 1 
d 

I 


i 
; Fil «MAR Edit: $B8L1001 


SRAEAAAAE AAA ERE AAA TEAR AAAAAAAAAAAAERAAAAAAAAAARAAAEAEAAAAAAERATERETAAAEAEEe 


7 ae 
* COPYRIGHT (c) 1978, 1980, 1982, 1984 BY * 
* DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. . 
* ALL RIGHTS RESERVED. . 

® 
* THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * 
* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE ®* 
* INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * 
* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * 
* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
* TRANSFERRED. * 
® t 
* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * 
* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * 
* CORPORATION. . 
® ® 
® ® 
® ® 
. ® 
® ® 
® * 


DIGITAL ASSUMES NO RESPONS wy FOR THE USE OR RELIABILITY OF ITS 


I 
SOFTWARE ON EQUIPMENT WHICH NOT SUPPLIED BY DIGITAL. 


LARA RRRARRAARAARERALALAALALALELASS ELAS ESSER RSE LEER RSE ERR A ERR E ERLE REE A REE SE 


 FAcILity: General Utility Library 
ABSTRACT: 

LIBSBBSSI tests and sets a bit with interlock. 
ENVIRONMENT: Runs at any access mode, AST Reentrant 
AUTHOR: Steven B. Lionel, CREATION DATE: 16-AUG-1982 
MODIFIED BY: 

1-001 = Original. SBL 16-AUG-1982 
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T and set bit interlocked 15-SEP-1984 :48:44 VAX/VMS Macro v04-00 Pa ll 
DECLARAT I arse a8s FTiGB as LM LNTS Base yee ee ans Pee? 8, - 
0 45 .oofTL DECLARATIONS 
¢ t LIBRARY MACRO CALLS: 
a3 : NONE | 
p : ; EXTERNAL DECLARATIONS: 
$00 4 : -DSABL GBL : Force all external symbols to be declared 
C000 4; NONE 
00 > 
99 6 ; MACROS: 
0000 8: NONE 
0000 (59; 
0000 60 : EQUATED SYMBOLS: 
0000 61; 
0000 6¢ ; NONE 
909 63 ; , 
000 64 ; OWN STORAGE: : 
0000 65: 
0000 66: NONE 
0000 67: 
9000 68 ; PSECT DECLARATIONS: 
00000000 «= 70 * .PSECT _LIBSCODE PIC, USR, CON, REL, LCL, SHR, - 
9909 71 EXE, RD, NOWRT. LONG 


— | 
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1BSBBSS1 bit interlocked 15-SEP-1984 23:48:44 VAX/VMS Macro V06-00 p 
4-001 + 68:46} REIL ert § 


st and set a bit with inte 6-SEP-1984 LIBRTL.SRCILIBBBSSI.MAR; 1 

“a -SBTTL LIBSBBSSI = Test and set a bit with interlock 

FUNCTIONAL DESCRIPTION: 
LIBSBBSSI tests and sets . 


LIBSBBSSI makes the VAX-1 
callable procedure. 


t 
=e 
on 


: selected bit under memory interlock. 

3 BBSSI instruction available as a 

; The single bit specified by the ‘‘position’’ and ‘‘base'’ arguments 

3 is tested, the previous state of the bit remembered, and the bit set. 
3 The reading of the state of the bit and the setying of it constitute 
3 an interlocked operation, interlocked against similar operations by 

3 other processors or devices in the system. The remembered previous 

; state of the bit is then returned as the function value of LIB$BBSSI. 


For more information, see the VAX-11 Architecture Reference Manual. 
; CALLING SEQUENCE: 

previous-state.wv.v = LIBSBBSSI (position.rl.r, base.rz.r) 
; FORMAL PARAMETERS: 


position = 4 ; The signed Longword bit position, relative to ‘’base’’, 
; of the bit being tested and set. Passed by reference. 


00000004 


PROPPINIPININIIN 2 9 9 2 PF MF FOQOOOCOSGDOSOOOCOOOOOO OOO OOM MOM DDoM0 ys NN 
NAME WN SO DOONAN WIN OOOO NAU ES WWN SO OD NAUES WN 0 OONAUES WN OOONOUS 


00000008 000 1 base = 8 ; The byte which contains bit zero of the object 
b8 ! ; being tested and set. Passed by reference. 
000 103 : IMPLICIT INPUTS: 
00 1 3 
00 1 r NONE 
00 1 3 
4 ! ; IMPLICIT OUTPUTS: 
000 109: NONE 
00 1 3 
Bp ! 3 ROUTINE VALUE: 
of ! : The previous value of the bit which was tested and set. 
99 > SIDE EFFECTS: 
00 1 : Sets the specified bit. 
00 118 ; 
0 1 
sa? 00 1 -ENTRY LIBSBBSSI, “M<> ; ; 
50 601 =D 00 1 MOVL #1, RO ; Initially, assume bit set 
02 08 BC (04 ac £6 bbe 1 BBSSI Speers tantAh) . @base(AP), 10$ ; Skip if bit set 
0 04 00 1 CLRL R ; Bit was clear 
4 it ! 10$: RET ; Return previous state 
OOE 1 END ; End of module LIBS$BBSS! 
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LIBSBBSSI - Test and set bit interlocked 15-SEP-1984 23:48:44 VAX/VMS Macro V04- 
Symbol table axsEpafoe 7208645 LeTORTe eaeic Moose; mars? 2% ($y, 
BASE = 0000 008 
LIBSBBSSI 4 8 RG 01 
POSITION c 4 | 


tama nme eeeeecanaon $+ 


| 
! Psect synopsis ! 


$e moame nanan o noone > 


PSECT name Allocation PSECT No. Attributes 
» OS S44 ( 0.) 89 ( ?-? NOPIC USR CON ABS LCL NOSHR NOEXE NORD NOWRT NOVEC BYTE 
_LIBSCODE QOOOOOO0E (« 14.) O17 ¢ .) PIC USR CON REL LCL SHR EXE RD NOWRT NOVEC LONG 


toeocen CEO ER Mma mae mo a + 


Initialization 29 60:00:00 .07 00:00:00.65 
Command processing 109 88: 0:00. ¢ 00:00:02.22 
ass 71 bbe! B°§ 00:00:01.85 
Symbol table sort 9 00:00:00. 00:00:00.00 
Pass 3 00:00:00.1 4 00.99 
Symbol table output 00:00:00.00 0:00:00.00 
Psect synopsis output ee 00:00:00.02 
Cross-reference output 00:00:00.0 00:00:00.00 
Assembler run totals 252 00:00:00.84 00:00:05.83 
The working set Limit was 750 pages. 
1229 bytes (3 pages) of virtual memory were used to buffer the intermediate code. 
There were 10 pages of symbol table space allocated to hold 3 non-local and 1 local symbols. 
127 source Lines were read in Pass 1, produc ing 10 object records in Pass 2. 
0 pages of virtual memory were used to define 0 macros. 
ey 


Macro Library name Macros defined 
“S255SDUAZB:(SYSLIBISTARLET.MB;20 0S” 0 
0 GETS were required to define 0 macros. 
There were no errors, warnings or information messages. 


MACRO/ENABLE=SUPF'RESSION/DI SABLE=(GLOBAL , TRACEBACK) /LIS=LIS$:LIBBBSSI1/0BJ=OBJ$:LIBBBSSI MSRC$:LIBBBSSI/UPDATE=(ENH$:LIBBBSSI) 
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